home *** CD-ROM | disk | FTP | other *** search
- /*--------------------------------------------------------------------------*/
- /* */
- /* */
- /* ------------ Bit-Bucket Software <no-Inc> */
- /* \ 10001101 / Writers and Distributors of */
- /* \ 011110 / No-Cost<no-tm> Software. */
- /* \ 1011 / */
- /* ------ */
- /* */
- /* Copyright (C) 1987, 1988, 1989 by Robert Hartman and Vincent Perriello */
- /* */
- /* */
- /* Box Drawing subroutines for BinkleyTerm 2.10 */
- /* */
- /* */
- /* For complete details of the licensing restrictions, please refer */
- /* to the License agreement, which is published in its entirety in */
- /* the MAKEFILE and BT.C, and also contained in the file LICENSE.210. */
- /* */
- /* USE OF THIS FILE IS SUBJECT TO THE RESTRICTIONS CONTAINED IN THE */
- /* BINKLEYTERM LICENSING AGREEMENT. IF YOU DO NOT FIND THE TEXT OF */
- /* THIS AGREEMENT IN ANY OF THE AFOREMENTIONED FILES, OR IF YOU DO */
- /* NOT HAVE THESE FILES, YOU SHOULD IMMEDIATELY CONTACT THE AUTHORS */
- /* AT THE ADDRESSES LISTED BELOW. IN NO EVENT SHOULD YOU PROCEED TO */
- /* USE THIS FILE WITHOUT HAVING ACCEPTED THE TERMS OF THE */
- /* BINKLEYTERM LICENSING AGREEMENT, OR SUCH OTHER AGREEMENT AS YOU */
- /* ARE ABLE TO REACH WITH THE AUTHORS. */
- /* */
- /* */
- /* The Authors can be reached at the following addresses: */
- /* */
- /* Robert C. Hartman Vincent E. Perriello */
- /* Spark Software VEP Software */
- /* 427-3 Amherst Street 111 Carroll Street */
- /* CS2032, Suite 232 Naugatuck, CT 06770 */
- /* Nashua, NH 03061 */
- /* */
- /* FidoNet 1:132/101 FidoNet 1:141/491 */
- /* Data (603) 888-8179 Data (203) 729-7569 */
- /* */
- /* Please feel free to contact us at any time to share your comments */
- /* about our software and/or licensing policies. */
- /* */
- /* */
- /* This module is derived from code developed by Augie Hansen in his */
- /* book "Proficient C" published by Microsoft Press. Mr. Hansen was */
- /* kind enough to give us verbal permission to use his routines, and */
- /* Bob, Vince and Alan (and all our full screen users) are grateful. */
- /* If you decide to use this code in some package you are doing, give */
- /* some thought to going out and buying the book. He deserves that. */
- /* */
- /*--------------------------------------------------------------------------*/
-
-
- #include <string.h>
-
- #ifdef __TURBOC__
- #include <mem.h>
- #else
- #include <memory.h>
- #endif
-
- #include "sbuf.h"
- #include "com.h"
- #include "xfer.h"
- #include "zmodem.h"
- #include "keybd.h"
- #include "sched.h"
- #include "externs.h"
- #include "prototyp.h"
-
- extern BUFFER Sbuf;
- extern CELLP Scrnbuf;
-
- int sb_scrl (win, n)
- REGIONP win;
- int n;
- {
- register int r, c;
-
- c = win->sc0;
- if (n == 0)
- {
- /* clear the entire region to spaces */
- sb_fillc (win, ' ');
- }
- else if (n > 0)
- {
- /* scroll n rows up */
- for (r = win->sr0; r <= win->sr1 - n; r++)
- {
- memcpy (Scrnbuf + r * SB_COLS + c, Scrnbuf + (r + n) * SB_COLS + c,
- (win->sc1 - win->sc0 + 1) * 2);
- if (win->sc0 < Sbuf.lcol[r])
- {
- Sbuf.lcol[r] = win->sc0;
- }
- if (win->sc1 > Sbuf.rcol[r])
- {
- Sbuf.rcol[r] = win->sc1;
- }
- }
- for (; r <= win->sr1; r++)
- {
- for (c = win->sc0; c <= win->sc1; c++)
- {
- (Scrnbuf + r * SB_COLS + c)->b.ch = ' ';
- }
- if (win->sc0 < Sbuf.lcol[r])
- {
- Sbuf.lcol[r] = win->sc0;
- }
- if (win->sc1 > Sbuf.rcol[r])
- {
- Sbuf.rcol[r] = win->sc1;
- }
- }
- }
- else
- {
- /* scroll n rows down */
- n = -n;
- for (r = win->sr1; r >= win->sr0 + n; r--)
- {
- memcpy (Scrnbuf + r * SB_COLS + c, Scrnbuf + (r - n) * SB_COLS + c,
- (win->sc1 - win->sc0 + 1) * 2);
- if (win->sc0 < Sbuf.lcol[r])
- {
- Sbuf.lcol[r] = win->sc0;
- }
- if (win->sc1 > Sbuf.rcol[r])
- {
- Sbuf.rcol[r] = win->sc1;
- }
- }
- for (; r >= win->sr0; r--)
- {
- for (c = win->sc0; c <= win->sc1; c++)
- {
- (Scrnbuf + r * SB_COLS + c)->b.ch = ' ';
- }
- if (win->sc0 < Sbuf.lcol[r])
- {
- Sbuf.lcol[r] = win->sc0;
- }
- if (win->sc1 > Sbuf.rcol[r])
- {
- Sbuf.rcol[r] = win->sc1;
- }
- }
- }
-
- Sbuf.flags |= SB_DELTA;
-
- return (SB_OK);
- }
-
- int sb_set_scrl (win, top, left, bottom, right)
- REGIONP win;
- int top, left;
- int bottom, right;
- {
- if ((top < 0) || (left < 0) ||
- (bottom > win->r1 - win->r0) ||
- (right > win->c1 - win->c0))
- return (SB_ERR);
-
- win->sr0 = win->r0 + top;
- win->sc0 = win->c0 + left;
- win->sr1 = win->r0 + bottom - 1;
- win->sc1 = win->c0 + right - 1;
-
- return (SB_OK);
- }